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. 5 U1 
Exercice N°1 16_| OSC1/CLKIN RAO 
——— 15_| OSC2/CLKOUT RAI 
On désire programmer les équations suivantes par un PIC 16F84A 4 | our RAS 
RA4/TOCKI 
E1 E2 E3 E4 RBO/INT 
RB1 
ToD a a S 
ee. 0 s3 
Un > E 
S5 
ES > m 


On donne le tableau d'affectation des entrées et de sorties : 


Affectation des entrées 


Affectation des sorties 


Entrées 


Entrées PIC 


Sorties Sorties PIC 
S1 RBO 
S2 RB1 
S3 RB2 
S4 RB3 
S5 RB4 


Opérateurs logiques réalisés par le pic 


Opérateur | Opération 
NOT NON 

OR OU 

AND ET 

XOR OU exclusif 


1°) compléter le tableau suivant par : Entrée « E », sortie « S », Non connecté « NC » : 


PORT A PORT B 
RAO RBO 
RA1 RB1 
RA2 RB2 
RA3 RB3 
RA4 RB4 
RB5 
RB6 
RB7 
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2°) Trouver les valeurs qu’on devra placer dans les registres TRISA et TRISB du PIC16F84A : 


TRIS A ET )Hex 
TRIS B E O )Hex 


3°) Etablir les équations des sorties : 


4°) Compléter le programme en MikroPascal correspondant aux équations précédentes : 


program exercice1_equation; 


var 
E1:Sbit at RAO bit; 
E2 nue ue. | 
Éd: ne ; 
ER E ; 
D la à ee tamis 22 : 
DO ne ce : 
D A ; 
D ae a à 
Begin 
Trisa:=$....... ; // tout le portA est configuré comme entrées 
Trisb:=$....... ; // RB0,RB1,RB2,RB3,RB4 :sorties RB5,RB6,RB7 : entrées 
Portb :=...... : // initialisation 
While true do 
Begin 

D a E E HO ; // equation de S1 
A // equation de S2 £ RAZJOSCICIKN RAMAN 
SI E ; // equation de S3 á | RASMC RASIANSICMPY 

E E 1 equation de S4 Kk 
A // equation de S5 PECK 
End : er” 

; RB5 

END. rares 
5°) Si on veut modifier le microcontrôleur PIC 16F84A par un PIC 16F628A 


Quelle est l'instruction à ajouter au programme précédent pour programmer ces équations 
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Exercice N° 2: 


Soit le schéma à contact suivant : E1 


E O 


Tableau d'affectation d'entrées et de sortie 


E2 
S1 i 
E1 E2 S1 16 | RA7/OSC1/CLKIN 
15 | RA6/OSC2/CLKOUT 
RAO | RAÏ | RBO a | RANOR 


1°) Déduire l'équation logique de S1 


On désire programmer cette équation par un PIC 16F628A 


2°) Traduire cette équation par un programme Mikropascal 


program exercice? _equation; 
Var 
E1: sbit at porta.0; 


PIC16F628A 


RAO/ANO 
RA1/AN1 
RA2/AN2/VREF 
RA3/AN3/CMP1 
RA4/TOCKI/CMP2 


RBO/INT 


RB1/RX/DT 
RB2/TX/CK 
RB3/CCP1 

RB4 

RB5 
RB6/T10SO/T1CKI 
RB7/T10SI 


ete T : // désactivation des comparateurs analogique et PORTA numérique 


Begin 
Trisa:=$.......... ; 
Trisb:=$.......... ; 
A ; // initialisation 
While ............... do //boucle infinie 
Begin 


Exercice N° 3: 


Soit les schémas à contacts suivants : 


S2 
d | 
S1 wW 
KM1 
KM1 


KM2 


Affectation des entrées 


Affectation des sorties 


Entrées Entrées PIC 


Sorties Sorties PIC 
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On attribue à KM1 une variable de type bit (booléen) X et à KM2 une variable de type bit Y 


1°) Donner l'équation de X D dede 


2°) Donner l'équation de Y TE ie ua 


3°) Traduire ces deux équations par un programme Mikropascal 


program exercice 3 fonctions memoires; 


var 
S1: sbit at RAO bit; 
DA: uosa dite teens : 
ES e 
SA se que 
X ee : 
Begin 
X:=0,Y:=0; 
Trisa:=$.......... : 
Trisb:=$............ ; 
Portb :=..........…. ; // initialisation 
while true do 
Begin 
if ((S1=0) and ((S2=....) or (X=...))) then X:=1 else X:=0; 
e E NRA A UE ; 
if X=0 then portb.0:=0 else portb.0:=...; 
i YSOINEN Lea, 
end. 


Exercice N° 4: (Additionneur complet) 


On désire réaliser un additionneur complet avec le circuit 16F628A 


Le circuit possède 3entrées et deux sorties : 


A S 
B 

- Add R 
C l n RA7/OSC1/CLKIN RAO/ANO 
RA6/OSC2/CLKOUT RA1/AN1 
RA2/AN2/VREF 
RA5/MCLR RA3/AN3/CMP1 
RA4/TOCKI/CMP2 
S -(A ® B) ® Cin; ne 
RB1/RX/DT 
R1 =. (A @ B).Cin + A. B AB2/DUOK 


RB6/T10SO/T1CKI 
RB7/T10SI 


PIC16F628A 
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Compléter puis saisir le programme ci-contre pour réaliser ce circuit : 
program Additonneur; 


BE ; 

CE ; 

D ee ; 

BR a : 

begin 
TRISA:=$....... ; 
TRISB:=$....... = 

anses =$07; // Désactivation des comparateurs " PORTA numérique " 
PORTB:=........ ; // initialisation des sorties 
while true do begin 
E AAEE AETAT // équation de la somme 
E E E // equation du retenu 


Exercice N° 5: (Additionneur BCD) 
On désire réaliser un additionneur BCD avec le circuit 16F876A ; compléter alors le programme ci-contre: 
program additionneur_bcd; 


A S ee, z “an z 
A,B,S1: byte; a gem “dx $ 
begin = De + "as 
TRISA:=$.....; Œ Le me 2 
TRISB:=$......; E— Lg" 
PORTA:=....; a — 
while 1=1 do e 
begin 
A:=PORTB; // La variable A reçoit le contenu du PORTB 
A:= A and $........ ; // Masquer les 4 bits de poids le plus fort 
B:=PORTB; // La variable A reçoit le contenu du PORTB 
B:=B shr ....... ; // Décalage à droite de 4 bits 
ns : // Addition de A et B 
if S1 > then S1:= S1 + ....... : // Correction si la somme est > 9 
PORTA:= 2... : 
a | di 
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Exercice N° 6: (comparateur) 
On desire réaliser un comparateur de deux nombres de cinq bits avec le PIC 16F877A 


compléter alors le programme ci-contre: 


program comparateur; a AO 
oo 
L 
var n A1 
OSC1/CLKIN RBO/INT [33 oo z 
; . OSC2/CLKOUT sel = 0E A2 © 
A‘byte at portB; RAO/ANO RB3/PGM = oo 0 > 
B: s BO 0 600 Fe ne E o 2 A3 
ERRERA R den es ARANARAK ; RAS/AN3/VREF+ RB6/PGC |— 5 oo 
B1 0 RA4/TOCKI/C1 OUT RB7/PGD S A4 
ARE | 5 a RTE corrosion H 
+ B2 0 REO/AN5/RD RC1/TIOSICCP2 — 5 
ega: . w S RANGS  nos/sciosct E 
D D DE LE j 
83 D E - 
SUP: onns so ; 84 DD De BEA 
19 
begin Dale 
RD2/PSP2 FE [2| inf A < B 
RD3/PSP3 
TRISA:=$.....; Rosipsps | 
RDG/PSP6 À [2| egal A=B 
TRISB:=$ : RD7/PSP7 
Kiai ses ; PIC16F877A [2| supA>B 
=$...... : 
PORTC:=...; 
ADCON1:=$........ ; // tout le port A est numérique 
while true do 
begin 
if A < B then inf:=.... else inf:=....... | 
end; 


Exercice N°7:(GRAFCET1) 


Le fonctionnement d’un système est décrit par le GRAFCET suivant: 


OSC1/CLKIN 
OSC2/CLKOUT 


MCLR 


PIC16F84A 


Circuit de commande du système 
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1°) Compléter le GRAFCET codé microcontrôleur 
2°) Compléter les affectations des deux registres TRIS A et TRIS B. 


TRIS A 


TRIS B 


3°) compléter le programme relatif au grafcet précédent 


program exercice7_grafcet1; 


Var 
m: sbit at RBO bit ; 


KO X IX KB Srerhissse ; 
BEGIN 
| 1! Configuration du registre TRISA en Hexadécimal 
; 1! Configuration du registre TRISB en Hexadécimal 
TT : // initialisation du portA 
XOST XVE in Dal noms cos : // initialisation des étapes du grafcet 
A a A // boucle infinie 
BEGIN 
IF CO re PAND'É usure. )) THEN II Condition d’activation de l’étape1 
BEGIN 
END ; 
IF (limite LAND )) THEN Il Condition d’activation de l’étape2 
BEGIN 
X1:=0;,X2:=1; 
END ; 
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I! Condition d'activation de l’étape3 


BEGIN 
END ; 
EE E E E E E ee D E dans II Condition d'activation de l’étape0 
IF (X1=1) THEN KM1:= 1 ELSE „onosaia [| Programmation de la sortie KM1 


[I Programmation de la sortie KM2 


[| Programmation de la sortie KM3 


[IProgrammation de la sortie KM4 


Exercice N°8:(GRAFCET2) 
Système : chaîne fonctionnelle : 


Zone de détection 


Pièce 


Courte Pièce longue 
* r a . x x . ièce Pièce courte 
On peut assimiler la chaîne fonctionnelle à un système de tri de Lonnie N o 
pièces. Q D + 
Les pièces longues et les pièces courtes arrivent sur le même PL 
convoyeur : 
i i A Bac d'évacuation 


> Si la pièce est longue, elle doit passer jusqu'à la fin du tapis Gage] [ins Tore 
pour être évacuée. Sae KO Sie 
> Si la pièce est courte, elle doit être éjectée dans un bac. 2. 


On veut commander la chaîne fonctionnelle par un microcontrôleur PIC 16F84A. 
On donne le grafcet P.O et le tableau d'affectation des entrées et sorties 


GRAFCET d’un point de vue P.O 


Affectation des entrées | Affectation des sorties 
Entrées système | Entrées PIC | Sorties système | Sorties PIC 


dcy 
MT 

$S; S; 1°) Compléter les affectations des deux registres TRISA et TRISB. 
5H MT RA4 | RA3 | RA2 | RA1 | RAO 

TRISA 

S; 
MT T1 6 - MT) T2 

T taSs Te RB7 | RB6 | RB5 | RB4 | RB3 | RB2 | RB1 | RBO 

TRISB 

www.seriestech.com 
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2°) Compléter le programme en langage pascal relatif à la commande du système : 


program Exercice8_grafcet2; 


Var 
dcy:sbit at porta.0; 
SE a 
DA A 
OS A EA 
MES 2 
Se:sbit at portb.1; 
var X0, X1, X2, X3, X4,X5,X6,T1,T2:....... : 
begin 
trisa := $....... :// configuration du portA en entrée 
trisb := $....... ; portB := ....... : // configuration et initialisation du portB 
X0:= ....; X1:= .... ;X2:= ....,X3:=0; X4:=0;,X5:=0,X6:=0; 
EEEE // boucle infinie 
begin 
if ((X0=1) and (dcy=1)) then 
begin 
XO := aan KI = sise ; 
end; 
begin 
X1 := 0; X2 :=1; 
end; 
if((X2=....... ) and ( S3=1) ) then 
if ((X3=....... ) and ( S3 =....... )) then 
begin 
X3 := 0; X4 :=1; 
end; 
begin 
XÍ im XD use : 
end; 
if((X5=1) and (S3=1)) then 
begin 
end; 
if ((X6=....... ) and (t2=....... EE (X4=....... ) and (t1=....... )) then 
X6 := ....….. ; X4 =... :X0:= ...... 
/] programmation des sorties 
if((X1=1) ....... (X2=1) ....... (X3=1) ....... (X4=1) ....... (X5=1) or (X6=1)) then MT:=1 else MT:=0; 
E E A then Se:=1 else Se:= .......; 


// programmation des temporisations 
if (X4=1) then T1 := 1 else T1:=0; 
if T1=1 then delay ms(5000); 
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Exercice N°9:(GRAFCET3) 


Système : déplacement d’un chariot: 
Le chariot étant en position initiale (S1 est actionné) un ordre de départ cycle « dcy » provoque : 
- Le déplacement du chariot jusqu'à « S2 » 
- Le chargement du chariot avec un produit et une temporisation de 10s. 
- Le déchargement en « S3 » 
- Retour du chariot en « S2 » pour le charger et le décharger de nouveau en « S3». Enfin, il revient en 
« S1 ». 
Un compteur est incrémenté à la fin de chargement, sa sortie n=1 si le chariot est chargé 2 fois. 
Chargement U2 
Fr 2 = ( Déchargement RA7/OSC1/CLKIN RAO/ANO 
Dcy RA6/OSC2/CLKOUT RAÏ/AN1 
RA2/AN2/VREF 


RA5/MCLR RAS/AN3/CMP1 
RA4/TOCKI/CMP2 
A A RBO/INT 


RB1/RX/DT 
S1 S2 S3 RB2/TX/CK 
RB3/CCP1 

RB4 

RB5 

RB6/T10S0/T1CKI 

RB7/T10SI 


On veut commander le système par un microcontrôleur PIC 16F628A. PIC16F628A 
En se référant au grafcet P.C et au tableau d'affectation des entrées et sorties 


1°) Compléter le GRAFCET codé PIC GRAFCET codé PIC 
GRAFCET P.C 
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2°) Compléter les affectations des deux registres TRISA et TRISB. 


TRISA 


TRISB 


3°) compléter le programme en langage pascal relatif à la commande du système : 
program EXERCICE _9GRAFCET3; 


DÉS a 
Le ane a nn 
SA aeui a oi 
ST A E E ET 
E h REEE E 
Meer eu 
KMI sie arrant anran en ni rnad aeni ki 
RNB E tee: 
v14M1:sbit at portA.2: 
KA. 
var X1,....... nie eon ii PE P XT, T in ; 
begin 
CMCON:=$......... : // désactiver les comparateurs analogiques et porta numérique 
trisA:=$......; trisB:=$....... ; portA:=....... ; // configuration des entrées sorties et initialisation 
X =: ; X2:=....… IX3:=....... :X4:=....… ADi Sinia X6:=...... XT Sia ; 
while .......aaaann. do //boucleinfini 
begin 
if ((X1=1) and (Dcy=1) and( S1 =1)) then 
begin 
X1 := 0; X2 := 1; 
end; 
if ((X2=1) and ( ss ) or (X6=1) and (.......... ) and(.......... )) then 
begin 
X2 := 0; X6 := 0; X3 :=1; 
end; 
TA E and (t=1)) ....... 
begin 
X3 := 0; X4 :=1; 
end; 
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if ((X4=1) and ( S3 =1)) then 


begin 


end; 


begin 
end; 
if ((X6=1) and ( ....... J AN sis )) then 
begin 
X6 := 0; X7 :=1; 
end; 
begin 
X7 := 0; X1 :=1; 
end; 


/] programmation des sorties 


if(X2=1)or (X4=1) then KM1:=.... else KM1:=0....; // programmation de la sortie KM1 


if(X5=1) then v14M1:=1 else v14M1:=0; // programmation de la sortie 14M1 


[| programmation du temporisation 
if (X3=0) then t := 0 else 
begin 
delay_ms(................... PL ste : 


end; 
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ExerciceN°10 


Soit le montage suivant permettant de commander 8 diodes LED avec un microcontrôleur PIC 16F628A : 


RES 
RBGTIOSO/TICH fa 


RET/TIOSI 


Fonctionnement : 


Tableau résumant le fonctionnement des diodes 


PORTA | RA2 | RAÏ | RAQ Etat des diodes 

Ja 0 0 0 Eteintes 

1 0 0 1 Clignotent pendant 2s 
0 1 0 Chenillard décalage à droite 
0 1 1 Allumées 
1 0 0 Chenillard décalage à gauche 
1 0 1 Eteintes 
1 1 0 Allumées 
1 1 1 Clignotent pendant 2s 


1°) Compléter le tableau précédent. 


2°) Déduire les valeurs des TRISA et TRISB du microcontrôleur : 


TRISA Ses Jin | = 


TRISB = Let 
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3°) Compléter le programme en Micropascal permettant de commander les diodes LED : 


program exercice_10; 


var i:byte; // declaration d'une variable i de type octet 


begin 
TRISB:= ........ :  // Configuration du port B comme sortie 
TRISA:=$.............. ; // Configuration du port A comme entrée 
PORTB:=.......... ; // initialisation du port B 
CMCON:=$........... ; // Désactivation du comparateur, PORTA numérique 
ETET I! Boucle infinie 
begin 
if (PORTA = 0) or (PORTA = ...)) then PORTB:= ........… ; // toutes les diodes sont éteintes 
PORTA =...) (PORTA = ...)) then PORTB:=$ ........... : //_ toutes les diodes sont allumées 
if (PORTA = ....... Dei (PORTAS.......... )) then //_clignotement des diodes 
begin 
PORTB:=$........ 4 
delay_ms(1000) ; 
PORTB:=$....... ; 
end; 
if PORTA = ......... then // fonctionnement chenillard décalage à droite 
begin 


PORTB:=%10000000; 
for i:=1 to 8 do // Boucle pour 
begin 
delay _ms(100); 
PORTB:=PORTB ........….. 1; // décalage à droite de 1 bit du PORTB 
end; 
end; 
if PORTA = 0... then /1 fonctionnement chenillard à gauche 
begin 
PORTE haie rntemmiaue 
for i:=1 to 8 do // Boucle pour 
begin 
delay _ms(100); 
PORTB:=PORTB ............1; // décalage à gauche de 1 bit du PORTB 
end; 
end; 
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ExerciceN°11 : Feux tricolores de carrefour i F 
Tableau de fonctionnement jour :( S1=1 ) „esm Ri 
Durée en secondes | 60 | 05 | 55 SEINE 
Rouge (porto.0) | 1 | O | O R2 esnai 
Orangé (portb.1) | O0 | 1 | O c1 
Vert (portb.2) 0011 ea Rouge 
Orangé 
J 
7 P [ Le Vert 
Fonctionnement nuit :(S1=0) : 
Le feu orangé clignote pendant une seconde. rs 


Compléter l'algorithme et le programme donné permettant de gérer le fonctionnement du feux tricolore d’un 
carrefour en se référant au tableau de fonctionnement (jour et nuit) et au schéma du montage fourni. 


Algorithme : feu_tri 


Variables : 


S1 : bit du registre PORTA affecté à RAO 
--- Début 


TrisA < TrisB = trisA:=$ … ; trisb:=$... ; portb:=$ 
-z Tant que (1=1) Faire while true do 
"77" Début 
SI Si=1 alors 
Début 
Portb € ..... 
Attente ( 


portb:=4; 
Vdelay_ms(55000) 


portb:=2; 
delay_ms(500); 


portb:=0; 
Attente (0,55) 


Fin SI 


Fin Faire 
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Compteur modulo 10 


1°) Compléter l'algorithme d’un compteur modulo 10. 


2°) Compléter le programme pascal correspondant. 


U1 


OSC1/CLKIN 
OSC2/CLKOUT 


MCLR 
RA4/TOCKI 


RBO/INT 
RB1 
RB2 
RB3 
RB4 
RB5 
RB6 
RB7 


PIC16F84A 


Algorithme : compteur m10 
Variable i :entier 
Début 
TrisA <% PotA = us 
Tant que vrai faire 
début 
faire 


Pour i variant de 


début 


PORTA € 


Attente (0,5s) 


Fin faire 


Fin faire 
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Program compteur m10 ; 


Var i'integer; 


// boucle infinie 


/! boucle répétitive 


delay_ms( 
end; 
end; 


End. 
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[| declaration d'une variable de type entier 
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Exercice N°13 


Compteur modulo 60 


1°) Compléter l'algorithme d’un compteur modulo 60 


2°) Compléter le programme pascal correspondant. 

Algorithme 
Algorithme compteur mod 60 program compteur60; 
variable i,j:entier VAR ijj:integer; 


-- début begin 


trisa = .... trisb = porta = .... portb = ..... trisa:=.....;trisb:=........ ;porta:=....; portb:=.... ; 


Tant que ( 
-. début 


pour i variant de 0 jusqu’à 5 faire 


for j:=0 to 9 do 


porta = ... portb = ... 


Attente (1s) 


___finfaire 


__ fin 


OSC1/CLKIN 
OSC2/CLKOUT 


MCLR 


PIC16F84A 
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Exercice N°14 

Compteur modulo 1000 avec un décodeur et 3 afficheurs 7 segments avec affichage multiplexé 

Le microcontrôleur 16F84A réalise le multiplexage de l'affichage. Le décodeur utilisé est le 7447 dont les 
sorties sont activées à niveau bas donc les afficheurs sont à anodes communes. 

Les bornes communes des afficheurs « anodes » sont commandées à travers des transistors NPN de telle 
sorte que lorsque un transistor est saturé, la borne commune de lafficheur est alors reliée au +Vcc donc 
l’afficheur correspondant fonctionne. 

Le principe est de placer le nombre à afficher sur le décodeur puis commander le transistor correspondant 


pour l'afficher. 


Schéma du montage 


Afficheurs à anodes communes . 


- Afficheurs 3- Afficheurs 2 Afficheurs 1 


OSC1/CLKN 
OSC2/CLKOUT 


| PICISFAA 
TEXT>. ñ 


z 
Les transistors utilisés pour la commande des afficheurs sont de type NPN. B 
C lc E 
e Si B=1 le transistor est saturé e Si B=0 le transistor est bloqué \ 
E E 


Le principe est d’incrémenter une variable d'identifier son unité, son dizaine et son centaine l'envoyer au 
décodeur puis à chaque fois on commande le transistor correspondant 
1°) Compléter le tableau suivant : 


Transistor : bloqué ou saturé Afficheur commandé : oui ou non Temporisation 
Nombre à afficher Ti T2 T3 Afficheur 1 | Afficheur 2 | Afficheur 3 
bloqué | bloqué | bloqué non non non 1ms 
Unité saturé i N) oui non non 10ms 
bloqué | bloqué | bloqué non non non 1ms 
dizaine LL id ser ” oae a 10ms 
bloqué | bloqué | bloqué non non non {ms 
centaine L P ja 
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2°) Compléter le programme : 


program exercice N14 compteur moduol1000 affichage mutiplexe; 


var i:word; 

var j:byte; 

var unite,dizaine,centaine:byte; 

begin 

trisb:=$.......… : // RBO,RB1,RB2,RB3 sorties RB4 à RB7 entrées 

trisa:=$.............. ; // RAO,RAÏ,RA2 sorties RA3,RA4 entrées 

porta:=......... ; // initialiser le PORTA 

E EE E /! Boucle infinie 

begin 

for i:=0 to 999 do 

begin 
unite:= į ....…. 10 ; // identifier le chiffre de l'unité de i 
dizaine:= (i ......... Tissue 10; //identifier le chiffre de dizaine de i 
centaine:= i........... 100 ; // identifier le chiffre de centaine de i 


for j:=1 to 28 do 

begin 

porta:=%000; 

delay ms(1); 

portb:=unite; 

portá:=%001; some sa 
delay ms(10); 

porta:=%000; 

delay _ms(1); 

BOND issus. : 

porta:=%.......... : // Commander le 2%% afficheur 
delay_ms(10); 

porta:=%000; 

delay_ms(1); 

DOTDi=, % assis ; 


delay_ms(10); 
end; 
end; 
end; 
end. 
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Exercice N°15: 


Réaliser un compteur et décompteur modulo10 
e Compteur incrémenté par le bouton RA2. 
e  Décompteur décrémenté par le bouton RA1. 


Utilisation de la fonction Button (port,bit, temps d'appui en ms état logique actif) 
Exemple : 


if Button (portA,3,50,1) then « action » 
On teste l’appui sur un bouton poussoir relié à la broche RA3 pendant 50ms pour faire l’action 1 
LE 


CRYSTAL 
FREQ=4ħiHz : 


OSCT/CLKIN RAO 

OSC2/CLKOUT RA1 

RA2 

MCLR R43 
RA4/TOCKI 


Compléter le programme : 


program exercice N_15 button; 
var x:byte; 

begin 
trisa:=$...;trisb:=....;portb:=....;X:= 
while true do 

begin 


if button(porta,2,100,1) then 


if button(porta,1,100,1) then 


if x=255 
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Exercice N°16: 


Réaliser un compteur modulo 10 sachant qu'a chaque impulsion sur la broche RBO le compteur 


s'incrémente : (Utiliser la procédure d'interruption externe avec la broche RBO) 
1°) Configurer le registre INTCON : 


nroon -C'E | EEIE | TOE | INTE | RBIE | TOiF | INTF | RBIF Valeur INTCON | 


2°) Compléter le programme : 


Programme 
program exercice_N_16_interrupt; 


VAR i:byte; 
procedure interrupt; 
begin 


OSCT/CLKIN 
OSC2/CLKOUT RA1 
RA2 
MCLR RA3 
RA4/TOCKI 


intcon :=..........… = 


RBOANT 
RB1 z 
RB2 e í 
z Interruption 
A T E 
RB5 
RBG 


RB7 


PIC16F844, 


If i=10 then i:=.......... ; 


end; 
end. 


Exercice N°17 


Réaliser un Compteur et Décompteur modulo 7 sachant qu’a chaque impulsion sur la broche RBO Le C/D 
s'incrémente ou se décrémente suivant une entrée a : 

a = 0— compteur ; a=1 — décompteur 

(Utiliser la procédure d'interruption externe avec la broche RBO) affecter la broche RB1 à l'entrée a 


OSC1/CLKIN RAO 
OSC2/CLKOUT RAÏ 


MCLR RA3 
RA4/TOCKI 


RBO/INT 


PIC16F84A 
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Compléter le programme de ce compteur et décompteur 


Programme 


program exercice comp decomp modulo7_interruption; 


if (a=1) then x:=................….. 


else X:=.......................... 


begin 


intcon := $ 


// boucle infinie 


) then x:=$06 


else if (x = $07) then x:=$ 


Exercice N°18 

Réaliser un compteur modulo 8 sachant qu’a chaque changement d'état sur au moins une des entrées RB4 à 
RB7 du PORTB le compteur s’incrémente : (Utiliser la procédure d'interruption externe avec RBI) 

1°) Configurer le registre INTCON : 


EE EEE TOI [INTE | ABIE LT INTP [REIP Valeur INTCON 


INTCON 
Oo To T T RE d 
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2°) Compléter le programme : 


[ Programme l 


program exercice_N_18_interrupt; 
VAR X,etat:byte; 


procedure interrupt; 


begin 
etat:=PORTB,; // lecture du portb pour déverrouiller l'accès au bit RBIF 


trisa:= 
intcon :=$ 
while(1=1) do 


OSC1/CLKIN Rao E 
OSC2/CLKOUT RAT 
RA2 


Ras FE 
RA4/TOCKI 


neor = 


o 
a Interruption_ RBI 


= 
e 
FICTGFSA — <] 


Exercice N°19 


Réaliser un Compteur / Décompteur modulo 256 sachant : 

æ chaque impulsion sur la broche RBO Le C/D s'incrémente: Utiliser la procédure d'interruption externe 
avec la broche RBO) 

æ chaque changement d'état sur au moins une des entrées RB4 à RB7 du PORTB le C/D se décrémente 
(Utiliser la procédure d'interruption externe avec RBI) 


OSC1/CLKIN 
OSC2/CLKOUT 
MCLR/Vpp/THV 


RAO/ANO 
RAT/AN1 
RA2/AN2/VREF- 
RAS/AN3/VREF+ RB7/PGD 
RA4/TOCKI _ Pre 
RA5/AN4SS  RCO/T1OSO/TICKI 
RC1/T10S1/CCP2 
RC2/CCP1 
RC3/SCK/SCL 
RC4/SDI/SDA 
RC5/SDO 
RC6/TX/CK 
RC7/RX/DT 


PIC16F876 


1°) Configurer le registre INTCON : 
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Programme 


program exercice N19 2interruption; 


var 


etat:byte; 


if INTCON.intF = 1 then 


intcon:=% 


end; 


intcon:=% 


while true do 


II Procédure d'interruption 
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Exercice N°20 


On désire réaliser un compteur modulo 9 en utilisant le timer TMRO. Le compteur est incrémenté à chaque 
front montant. 

1°) Indiquer si le le mode de fonctionnement du TMRO est compteur ou temporisateur : ........................... 
2°) Donner alors le nom de la broche de l'entrée d'horloge du TMRO : ..ssssssnsssssssnessesesrsrerrsrrerere 

3°) Configurer alors le registre « OPTION REG » 


RBPU | INTEDG | Tocs | Tose | Psa | Ps2 | Ps1 | Pso | 


2°) Compléter le programme suivant : 
program exercice N 20 TIMERO comp9; 


OSC1/CLKIN RAO 
OSC2/CLKOUT RA1 


TRISA:=$ ....... ; L RA2 
OPTION _reg:= %.................. ; 
TMRO:=0; 


RA3 
RA4/TOCKI 


while true do 


PIC16F84A 


begin 
DOrb = : 


if TMRO=......... then TMRO:=...... ; 
end; OSC1/CLKIN 


OSC2/CLKOUT 
end. JEE 


Exercice N°21 RA4/TOCKI 


On désire réaliser un compteur modulo 16 en utilisant le timer 
TMRO. 

Le compteur est incrémenté à chaque 2 front descendant. 

1°) Configurer alors le registre « OPTION REG » a 


RBPU | INTEDG | Tocs | Tose | Psa | Ps2 | Ps1 | Pso | 
EEE M 


2°) Compléter le programme suivant : 


program exercice N 21 TIMERO comp9; begin 
oeoi portb:=................ A 
MORTER PITTE T : // Configration PORTB 
A ‘j Contigration PORTA ns none nains 
OPTION -regi= nisspisininessss LL Ea 
TMRO:=....... ; // Initialisation du TMRO end. 


while true do 
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Exercice N°22 


On désire réaliser un compteur modulo 100 en utilisant le timer TMRO. Le compteur est incrémenté à chaque 


front descendant de RAA. 


On adopte l'affichage multiplexé puisqu'on dispose de d’un seule décodeur et de deux afficheurs 


OSC1/CLKIN RAO 
OSC2/CLKOUT RAI 
RA2 

MCLR RA3 
RA4/TOCKI 


RBO/INT 


7EG-MPX1-CA 


PIC16F84A 


1°) Configurer le registre « OPTION REG » 


Repu Liens | tocs | rose | Psa | Ps2 | Ps1 | 
EEE 


2°) Compléter le tableau suivant : 


Afficheur commandé : oui ou non 


2N2222 


Bit O 


Nombre à afficher T1 T2 Afficheur 1 | Afficheur 2 
bloqué | bloqué non non {ms 
Unité de TMRO saturé oui non 10ms 
bloqué | bloqué non non {ms 
Dizaine de TMRO 10ms 
bloqué | bloqué non non {ms 
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3°) Compléter le programme : 


program Exercice 22 TIMERO comp 100; 


program TIMERO; 
Var 

uni:byte; 
dix:byte; 


begin 
trisb:=$....... : 


// de RBO à RB3 sorties ,de RB4 à RB7 entrées 


trisa:=$....... ; // de RAO et RA1 sorties ,RA2 à RA4 entrées 


TMRO:=.....… ; /I initialisation du timer 0 à la valeur 0 


OPTION_REG = Toison 


while true do 
begin 


While TMRO < ........… do 


begin 
uni := TMRO .........… 10; 
dix := TMRO .........… 10 ; 


porta:=0; 
delay _ms(1); 
portb:=uni; 
porta:=...... ; 
delay_ms(10); 
porta:=0 ; 
delay_ms(1); 
portb:=dix; 
porta:=........ f 
delay_ms(10); 


end; 
TMRO:=....... 
end; 
end. 


// Identifier le chiffre de l'unité du TIMERO 
// Identifier le chiffre de dizaine de la variable i 


//_affichage multiplexé puisqu'on dispose d'un seul décodeur 
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Exercice N°23 
Soit à convertir une tension comprise entre 0 et 5V fournit par un potentiomètre branché sur RA2, et afficher 


le résultat sous forme binaires avec des LEDs. (Justification à droite) ,et sous forme décimale sur un 
afficheur LCD . 


SORTIE NUMERIQUE DECIMALE 
LCD1 LMO16L 


SORTIE NUMERIQUE BINAIRE 


9 8 7 6 5 4A 3 Un 0 
22 2 2 2 2 222 2 


ENTREE 
ANALOGIQUE 
OSC1/CLKIN RBO/INT 
OSC2/CLKOUT RB1 
RB2 
RAO/ANO RB3/PGM 
RA1/AN1 RB4 
POT ; = RA2/AN2/VREF-/CVREF RB5 
RAS/AN3/VREF+ RB6/PGC 


RA4/TOCKI/C1OUT RB7/PGD 
RA5/AN4/SS/C2OUT 

ie RCO/TIOSO/T1CKI 

MCLR/Vpp/THV  RC1/T10SI/CCP2 

RC2/CCP1 

RC3/SCK/SCL 

RC4/SDI/SDA 

RC5/SDO 

RC6/TX/CK 

RC7/RX/DT 


= PIC16F876A 


Le PIC 16F876A possède un convertisseur analogique numérique sur 10 bits, 
Lorsque la tension varie de 0 à 5V , N varie de 0 à 1023 


Ue Canal2 A.D.C N 

1°) Trouver la relation entre N et Ue 
Ue —_» N N 
n a 
2°) Configurer les entrées /sorties : 

TRISA TRISB 
J 

TRISC.0= .... TRISC.1=..... 

3°) Configurer le registre ADCON 1 
ADFM - - - PCFG3 PCFG2 PCFG1 PCFGO 


4°) Compléter le programme 
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program exercice N 23 CNA; 


var N : word; // déclaration d'une variable N de type mot sur 16bits 


Nd:string[5]; //declaration d'une variable Nd de type chaine de caractéres 


/1 Connection module LCD 

var LCD _RS : sbit at RC2_ bit; 

var LCD EN : ....................... 

var LCD _D4 : ssanie 

Var LOD D5 sms 

Var LOD. Dôme 

var LCD D7 : iessie i e s 


var LCD RS Direction : sbit at TRISC2 bit; 

var LCD EN Direction : .............................. 

var LCD D4 Direction : ...........................,...... 
var LCD D5 Direction : .........anassunnanunsruinrrrirrrnne 
var LCD D6 Direction : sbit at TRISC6 bit; 

var LCD D7 Direction : sbit at TRISC7 bit; 


begin 


Lcd _init(); //initialiser le module LCD 
Led Cmd(_ LCD CURSOR OFF); 


ADCONI Sn ur : // justification des 10 bits a droite et RA2 entrée ANA 
TRIISA = nes ; /| PORTA Entrées 

TRISB :=....... ; // PORTB Sorties 

TRISC.O sis ; // la broche RCO est cofigurée comme sortie 

TRISC.1 :=....... . // la broche RC1 est cofigurée comme sortie 


Lcd_out(...... ……;, Conversion est); // Ecrire « conversion est : » à la première ligne et premier colonne 


A OT EE // boucle infinie 


begin 
N := ADC_Read(......... ); / lecture de la valeur lue par le convertisseur sur le canal 2 
PORTE := ........ ; // Les 8 bits de plus faibles poids sont aux PORTB 


PORTE := N shr(.....); // Afficher les 2 bits de fort poids sur RCO et RC1 
wordtostr(N,Nd); // transformer la variable N de type word en chaine de caractéres 
Lcd_out(.....,.... Nd='); // Ecrire « Nd= » à la deuxième ligne et premier colonne 
Led_out(.....,...... .Nd); // Ecrire Nd à la deuxième ligne et cinquième colonne 


end; 


end. 
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Exercice N°24 


1 à . . . ` ENTREE ER 
Soit à convertir une tension variable de 0 à 5V aa ss 
branchée sur l'entrée RAO ; 

m . r . $. e 
L'affichage de la tension en mV est réalisé par un el 


afficheur LCD comme le montre la figure ci-contre 


RAS/ANS/VREF+ 


7 Rcomiosomicki Let 
MCLR/Vpp/THV RC1/T10S/CCP2 k 
AC2CCPI 


1°) Comment doit-on configurer l'entrée RAO ? 
Numérique ou analogique 


RC4/SDUSDA | 


2°) Configurer le registre TRISA «Tout le PORTA est utilisé comme entrée» 
TRISA 


Le convertisseur C.A.N fournit un nombre binaire naturel de 10 bits (B9 B8 B7 B6 B5 B4 B3 B2 B1 B0) 
Deux registres (2 X 8 bits) sont nécessaire pour stocker le résultat de la conversion. Ce sont les registres : 


e ADRESH 
e ADRESL 


3°) Sachant que le résultat de la conversion est justifié à droite compléter les deux registres ADRESH et 
ADRESL 


ADRESH ADRESL 


10 bits du résultat 
3°) Configurer le registre ADCON 1 


ADFM = - = PCFG3 PCFG2 PCFG1 PCFGO 
is 0 0 0 is sdi is su 


4°) Compléter le programme ci-dessous : 


program exercice N 24 voltmétre; 

var 

N':word; //2 octets car le résultat de conversion est sur 10 bits 

calcul:real ; // 4 pour ne pas avoir un dépassement de taille lors de la multiplication 
tension:word ; //2 octets car la tension est affichée en mV elle est compris entre 0 et 5000 mV 
valeur_affichage :string[4]; // chaine de 4 caractéres pour afficher la tension 


// connection de L'LCD 
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LCD RS :sbit at portc.0; 


LCD RS direction :sbit at TRISC.O; 


LCD_EN_direction sers csciiscidisus 


LCD_D4 direction : ........................... 
LCD D5 direction : .......................... 
LCD D6 direction : ....................,..... 


LCD D7 direction : ....................,..... 


ADCON1:=% neeese 


LCD _init(); 


LCD_cmd(_LCD cursor_ off); 


LCD out (1,1,'V='); 
while true do 
begin 


N:= ADC read( 


calcul:= (N*(5000/1023)); 


tension := word(calcul); // 


wordtostr(tension,valeur_ affichage); // 


LCD out (1,3,valeur_ affichage); 
delay _ms(1000); 
end; 


end. 
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Exercice N°25 : 


Ecrire un programme qui permet de commander un moteur à courant continu avec un rapport cyclique 


a = 0,5. Utiliser la technique MLI (PWM) 
Sortie sur RC2 fréquence de MLI (1000Hz) 


5 fn qe) 
U1 
OSC1/CLKIN RBO/INT 
OSC2/CLKOUT RB1 
RB2 
RAO/ANO RB3/PGM 
RA1/AN1 RB4 
RA2/AN2/VREF-/CVREF RB5 
RA3/AN3/VREF+ RB6/PGC 
RA4/TOCKI/C1 OUT RB7/PGD 
RA5/AN4/SS/C2OUT 

RCO/T1OSO/T1CKI 

MCLR/Vpp/THV  RC1/T10SI/CCP2 Q1 

RC2/CCP1 2N2222 2.20 1.22m e.2Zm 3.00m 4.00m 5.Ø0Øm 

RC3/SCK/SCL 
RC4/SDI/SDA 


RC5/SDO 
RC6/TX/CK 
RC7/RX/DT 


PIC16F876A 


program exercice N_ 25 MLI; 

begin 

PWMA1_init(500); // initialisation du PWM à 1000Hz 
PWMi_ start; 

while true do 

begin 

PWM1_Set_Duty(...... ); 

end; 

end. 

Exercice N°26 : 


Ecrire un programme qui permet de commander un moteur à courant continu avec 4 vitesses 
Sortie sur RC2 fréquence de MLI (1000Hz) 


Compléter le tableau ci-dessous et le programme maa 
Entrées Rapport N QUE : | 
cyclique 
PORTB =0 a = 0 N=0 Me aA ] 
PORTE =1 a = 0,25 N = 64 Re EE vx @ 
PORTB =3 a =0,5 N =... nent. iia po. 
PORTB =7 a =0,75 N =... | NT 
PORTB =15 a =1 N =... 
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program exercice N 26 ML: 
begin 
TRISB:=$FF; 
PWM1_Init(............…… j; 
PWM1_ Start; 
while true do 
begin 


if PORTB=0 then PWM1_Set_duty(............ ); 


if PORTB=1 then PWM1_Set_duty(............ ); 


if PORTB= 3 then PWM1_Set_duty(............. }: 


if PORTB= 7 then PWM1_Set_duty(............. ); 


if PORTB= 15 then PWM1_Set_duty(255); 


end; 
end. 


Exercice N°27 : 

Ecrire un programme qui permet de commander un moteur à courant continu avec un rapport cyclique 
variable de 0 à 1 en utilisant la technique MLI (PWM) 

Le rapport cyclique augmente si on appui sur le bouton RA2 et il diminue si on appui sur le bouton RA1 
Utilisation de la fonction Button (port,bit,temps d'appui en ms état logique actif) 

Exemple : if Button (portA,3,50,1) then « action » 

On teste l'appui sur un bouton poussoir relié à la broche RA3 pendant 50ms pour faire l’action 1 

1°) Compléter les phrases suivantes : 

Si on appui sur le bouton RA2 la vitesse du moteur .............................. 

Si on appui sur le bouton RAÏ la vitesse du moteur .......................,..... 


2°) Compléter le programme : 
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SLT bai Lu “1 i a 
= L L] = L E L 
; l : : RAIN. RE 
QSCA/CLKIN aa 
osc2/CLKOUT 10. . . . . K Mimi : 
MÉLRVPpTHV h Diminuer la vitesse 
RAD/ANI a -O a Se sn 
RATANA À 5 e 
RAZ/ANDIVREF- 
RASIANS/VREF+ À 
RAWTOCK Eo 
RCO/TIOSO/TACK  RAS/ANGISS À a NET 
RC1/T10SI/CCP2 À ET 
RC2/CCP1 . 
RCS/SCWSCL J ugmenter la vitesse 
MAG OU OT tt + + + nl eC#SD/SDA a NS ON SRE 
ALES z= RCS/SDO R3 
LT . RCG/TX/CK de 
ROT/RXDT 
ee L l t 
. STEP, 
es {YSM Oscilloscope x] 
DIA e z m 
YPI 1 © 
1N4148 mee 
TEXT 
Dud @ 
; j XY © 
ES a F4. g Trigger X-Pos 
E 2N222 
Ve S s TEXT 
TEXT 4 
P L 


cH E? S2 cE? Se 


program exercice _N_27_MLI; 

var x:byte; 

begin 

PWM1_lnit(1000); 

PWM1_Start(); 

ADCON1:=$......... ; // PORTA numérique 
trisa:=$............ strisb:=....... yportb:=....... ;x:=0; 
while true do 

begin 


portb:= x; 
PWM1_Set_duty(.....); 
end; 

end. 


3°) Expliquer le rôle des deux instructions colorées en bleu. 
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Exercice N°28 : 
Lire le programme ci-dessous puis remplir les tableaux 1 , 2 et3 : 
program exercice N 28 Clavier; 
var keypadPort : byte at PORTB; // le clavier est relié au port B 
var kp : byte; // On déclare une variable kp de type octet 
begin 
trisa:=0; // Le portA est configuré en sortie 
porta:=0; //Initialisation du portA 
Keypad_Init(); // initialiser le portB pour communiquer avec le clavier 
while true do 
begin 
kp := Keypad_Key_Click(); 
if kp <> 0 then porta:=kp; 
end; 


end. Montage 1 


OSC1/CLKIN RAO 
OSC2/CLKOUT RA1 
RA2 


MCLR 


Tableau 1 


Touche 


Kp PortA 


O 
O 


~i+ I ZlololoiËNio aA wn —= 


RA3 
RA4/TOCKI 


RBO/INT 


PIC16F84A 
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ne Tableau 2 
A = 
ELLE Touche Kp PortA 
oi a CEKA ai 1 
1 SScacikour pat [e 1 2 3 4 2 
=) mm nas FE nn oaei Oe O 
RE] = 3 
5 6 z E 4 
mes es a oct 
(SR | 5 
si 
aO |. a Les [no où a] 6 
fes) J l Le 7 
ON/C = + g 8 
se [Lune |e ma joon 
=) | l pes. 9 
: 0 
- ON/C 
+ 
/ 
X 
Montage 3 
Tableau 3 
NN- © 
o LL < Touche Kp PortA 
E fe fé fe 1 
ofr- olr 2 
7 3 
4 
OSC1/CLKIN 
OSC2/CLKOUT 5 
MCLR 6 
RA4/TOCKI 7 
ds 8 
= 9 
RB4 * 
RB5 
ar 0 
PIC16F84A # 
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REGITRE DE CONFIGURATION DES INTERRUPTIONS (INTCON) : 
Le registre INTCON (INTerrupt CONtroller) est le registre principal de contrôle et de gestion des 
interruptions. 
Le registre INTCON est parfois différent d'un PIC à un autre il est impératif de revenir au document 
constructeur pour chaque type de microcontrôleur. 
Registre INTCON pour PIC16F84A 


GIE | EEIE | TOE | INTE | RBIE | Toir | INTF | RBIF | 


Registre INTCON 


GIE : « Global Interrupt Enable » mis à 1 autorise toutes les interruptions non masquées par leur bit 
individuel. 


EEIE : « EEPROM write completed Interrupt Enable » : autorise les interruptions de fin d'écriture dans 
l'ÉEPROM. 


TOIE : « Timer 0 Interrupt Enable » : mis à 1 autorise les interruptions dues au débordement du timer 0. 


INTE : « /NTerrupt Enablé » : mis à 1, autorise les interruptions sur RBO/INI. L'interruption a lieu sur le front 
montant de l'impulsion si le bit INTEG (/NTerrupt Edge) du registre OPTION est à 1 ; elle a lieu sur 
le front descendant si ce bit est à 0. 


RBIE : « RB /nterrupt Enable » mis à 1, autorise les interruptions sur RB4 à RB7. 

TOIF : « Timer 0 Interrupt Flag » : est mis à 1 en cas de débordement du timer 0. 

INTF : « /NTerrupt Flag » : est mis à 1 si une interruption est générée sur RBO/INT. 

RBIF : « RB /nterrupt Flag », est mis à 1 lors d'un changement d'état sur une des lignes RB4 à RB7. 


Chaque indicateur de changement d'état doit être remis à 0 par le logiciel dans le programme de 
traitement de l'interruption. 


NB : Lors d'un Reset, tous les bits du registre INTCON sauf RBIF sont mis à 0. RBIF garde son état 
précédent. 
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LE TIMER TMRO 
Le registre TMRO est un compteur programmable de 8 bits (de 0 à 255). 
La configuration du TMRO est assurée par le registre OPTION « OPTION REG » 


[RBPUJINTEDG|TOCS | TOSE| Psa | PS2 | PS1 | Pso | 


OPTION_REG 


Bus de données 


RAd/TOCKI 


DIVISEUR 


Positionne le drapeau (TOIF) 
en cas de débordement 


TOSE TOCS  PS[2:0] PSA Tableau 1 


Schéma synoptique du registre OPTION 


Le TMRO est incrémenté en permanence soit par : 

e L'horloge interne (fosc/4) « mode TIMER > 

e L’horloge externe appliquée à la broche RA4 du portA « mode compteur » 
Le choix de l'horloge se fait à laide du bit 5 du registre OPTION REG « TOCS » 

e TOCS=0 Horloge interne « mode TIMER > 

e TOCS=1 Horloge externe « mode COMPTEUR» 
Dans le cas de l'horloge externe ,le bit 4 « TOSE » du registre OPTION REG permet de choisir le front sur 
lequel le TIMERO s'incrémente : 

e TOSE = 0 incrémentation sur fronts montants 

e TOSE = 1 incrémentation sur fronts descendants 
Quelque soit l'horloge choisie, on peut la faire passer dans un diviseur de fréquence programmable 
(prescaler) dont le rapport est fixé par les bits PS0,PS1 et PS2 du registre OPTION REG « voir tableau 1 » 
L’affectation ou non du prédiviseur se fait à l’aide du bit 3 « PSA » du registre OPTION REG 

e PSA =0 on utilise le prédiviseur. 


e PSA=1 pas de prédiviseur. 


Bit 6 :INTEDG « INTerrupt Edge » : dans le cas où on utilise l’ interruption externe avec RBO 
e SiINTEDG = 1, on a interruption si le niveau sur RBO passe de 0 vers 1. « front montant » 


e Si INTEDG = 0, l'interruption s'effectuera lors de la transition de 1 vers 0. « front descendant » 


Bit 7 : RBPU: Quand ce bit est mis à 0, une résistance de rappel au +5 volt est placée sur chaque broche 
du PORTB 


N.B À l'issue d'un Reset, le registre OPTION_REG = 11111111 
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REGISTRE ADCON1 


ADFM - - - PCFG3 PCFG2 PCFG1 PCFGO 
bit 7 bit 6 bit 3 bit 2 bit 1 bit 0 


Bit 6, bit 5 et bit 4 : Bits non implantés. 


Bit 3,bit 2,bit 1 et bit O :PCFG3, PCFG2, PCFG1 et PCFGD0 : bits de contrôle de la configuration des ports : 
Ces bits permettent de choisir le partage entre entrées analogiques et digitales sur les ports A et E . 


lls permettent également de choisir pour Vref+ entre Vdd et RA3 et pour Vref- entre Vss et RA2 selon le 


tableau suivant : 


PIC 16F876 
: PIC 16F877 | 

+ RAS PERG PORTE PORTA Dors hronc ss 

PCFG3 | PCFG2 | PCFG1 PCFGO AN7/RE2 AN6/RE1 AN5/REO AN4/RA5 AN3/RA3 AN2/RA2 AN1/RA1 ANO/RAO Vref+ Vref- 
0 0 0 0 A A A A A A A A Voo | Vss 
0 0 0 1 A A A A Vref+ A A A RA3 | Vss 
0 0 1 0 D D D A A A A A Voo | Vss 
0 0 1 1 D D D A Vref+ A A A RA3 | Vss 
0 1 (0) 0 D D D D A D A A Voo | Vss 
0 1 0 1 D D D D Vref+ D A A RA3 | Vss 
0 1 1 X D D D D D D D D Voo | Vss 

1 0 0 0 A A A A Vref+ Vref- A A RA3 RA2 

1 0 0 1 D D A A A A A A Voo | Vss 

1 0 1 0 D D A A Vref+ A A A RA3 | Vss 

1 0 1 1 D D A A Vref+ Vref- A A RA3 RA2 

1 1 0 0 D D D A Vref+ Vref- A A RA3 | RA2 

1 1 0 1 D D D D Vref+ Vref- A A RA3 | RA2 

1 1 1 0 D D D D D D D A Voo | Vss 

1 1 1 1 D D D D Vref+ Vref- D A RA3 | RA2 

A : entrée analogique D : entrée numérique Voo =Vce= 5V ; Vss = GND=0 V 


Au reset ADCON1 = 00000000 : cela signifie que les 5 bits de port A et les 3 bits de Port E sont configurés 
en entrées analogiques. 

Pour récupérer les 5 bits du port A et les trois bits du port E en tant que |/O numériques (digitales) il faut 
écrire la valeur ’0 6’ dans ADCON1 

N.B : On s'intéressera uniquement au cas où Vref- = Vss = 0 et Vref+=Vbpp = 5V cas des lignes coloriées en 
rose dans le tableau. 

Bit 7 : ADFM 


Le convertisseur C.A.N fournit un nombre binaire naturel de 10 bits (B9 B8 B7 B6 B5 B4 B3 B2 B1 B0) 
Deux registres (2 X 8 bits) sont nécessaire pour stocker le résultat de la conversion. Ce sont les registres : 
e ADRESH 


e ADRESL 
Deux formats sont disponibles suivant la valeur du bit ADFM : 
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ADFM =1 :le résultat de la conversion est justifié à droite :ADRESH ne contient que les 2 MSB du 


résultat . Les 6 MSB de ce registre sont lus comme des « 0 » 


ADRESH 


ADRESL 


0 | O0 | O0 | O |B9 


B8 


B7 


B6 


B5 


B4 | B3 | B2 


B1 


BO 


ADFM =0 :le résultat de la conversion est justifié à gauche :ADRESL ne contient que les 2 LSB du 


hec eoe 


10 bits du résultat 


résultat . Les 6 LSB de ce registre sont lus comme des « 0 » 


ADRESH 


ADRESL 


B9 | B8 


B7 | B6 | B5 | B4 | B3 


B2 


B1 


BO 


0 


0 | 0 | 0 


a 


10 bits du résultat 


INSTRUCTIONS SPECIFIQUE AU COMPILATEUR MIKROPASCAL PRO POUR L’AFFICHEUR LCD 


Les variables suivantes doivent être définies dans tous les projets utilisant la bibliothèque d'affichage à 


cristaux liquides LCD: 


// Connections du module LCD 


var LCD RS 
var LCD EN 
var LCD D4 
var LCD D5 
var LCD D6 
var LCD D7 


: Sbit at RBO_ bit; 
: Sbit at RB1_bit; 
: Sbit at RB2 bit; 
: Sbit at RB3_bit; 
: Sbit at RB4 bit; 
: Sbit at RB5 bit; 


var LCD RS Direction : sbit at TRISBO bit; 
var LCD EN Direction : sbit at TRISB1_ bit; 


var LCD D4_ 
var LCD D5 | 
var LCD D6 | 
var LCD D7_ 


/ FIN 


Lod_Init () ; 


Lod_Out(1, 2, ‘BRAVO) ; // écrire BRAVO sur l'LCD à partir de la ligne 1 ,colonne 2 


: Sbit at TRISB2_bit; 
: Sbit at TRISB3_bit; 
: Sbit at TRISB4_ bit; 
: Sbit at TRISB5_bit; 


Direction 
Direction 
Direction 
Direction 


I] Initialisation de l'LCD 


13 
qa | CSCT/CLKIN 


OSC2/CLKOUT 


REO/ANS/RD. 
RET/ANGWR 
RE2/AN7/CS 


1 MOLRNVpPTHV 


RA2/AN2/VREF-/CVREF RB5 39 
RAS/ANS/VREF+ RB6/PGC 
RA4/TOCKI/C1 OUT 
RAB/AN4/SS/C2OUT 


RBO/INT 
RB1 


RB7/PGD 


RCOTIOSO/T1CKI |S 
RcuTiosuccPz |Ê 
RC2/CCP1 18 
RC3/SCK/SCL 
RC4/SDISDA | 
RC5/SDO 54 
RCS/TX/CK 
RC7/RX/DT 


RDo/PsPo | 


RD7/PSP7 


Lod_Chr(2, 3, i); // écrire la caractère équivalent en code ASCII i sur l'LCD à partir de la ligne 2 ,colonne 3 


Led _Cmd exemples : 


Lcd Cmd(_LCD CLEAR); // effacer l'LCD 


Lcd Cmd(_LCD CURSOR_OFF) ; // supprimer le curseur 
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INSTRUCTIONS SPECIFIQUE AU COMPILATEUR « MIKROPASCAL PRO » POUR LE CLAVIER 


Var keypadPort : byte at PORT... ; // Pour la connexion du clavier au PORT. .. considéré ( 8 bits) 
Var Kp :byte ; // on définit une variable de type octet 

Keypad _Init();// Initialisation du clavier 

Kp:=Keypad key_Press(); // lecture de code de la touche « touche enfoncée » de 1 à 16. 


Kp:=Keypad key_click(); // lecture de code de la touche « touche enfoncée 


INSTRUCTIONS SPECIFIQUE AU COMPILATEUR MIKROPASCAL PRO POUR LE MODULE 


CONVERSION 


ADC_Init() ; // Initialise le module convertisseur et le configurer avec les réglages suivants: 
Vref-=0 ;Vref+ = 5V , Utilisation de l'horloge interne pour la conversion. 
N : word // déclaration d’une variable de type word 


N ADC_Get_Sample(1) // lecture de la valeur lue par le convertisseur sur le canal 1 


N ADC _ Read (2) // lecture après initialisation et démarrage de la conversion sur le canal 2 


INSTRUCTIONS SPECIFIQUE AU COMPILATEUR MIKROPASCAL PRO POUR LE MODULE PWM 
PWMx_Init(1000) // Initialise le module PWM de la sortie CCPx à la fréquence 1000Hz: 
PWMx_start() // Démarrage du module PWM et sortie du signal sur la broche CCPx 
PWMx_Set_duty(N) // Change le rapport cyclique a du signal sortant sur la broche CCPx avec 

N variant de 0 à 255 a=— 


PWMx_stop // Arrêter le module PWM de la sortie CCPx 
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